LOOKUP (Stock_Key.PREVINVS,Stock_Key.STOCKS) ELSE REQUEST "Stock key not found - Please select another Stock","",20,,Stock_Key.PREVINVS,60,Stock_Key.STOCKS,Company Name.STOCKS
Customer_Ref ;TXT VAL REQ ;8 ;1 ;0 ;>
LOOKUP (Customer_Ref.PREVINVS,Customer_Ref.CLIENTS) ELSE REQUEST "Customer ref not found - Please select another customer","",20,,Customer_Ref.PREVINVS,60,Customer_Ref.CLIENTS,Client.CLIENTS,Location.CLIENTS
Transaction ref;NUM CON RDO ;000000. ;2 ;0 ;>
SER ("TRANS")
Trans_Type ;TXT VAL REQ ;1 ;3 ;0 ;>
Trans_Type.PREVINVS = "b" OR Trans_Type.PREVINVS = "s" ELSE REQUEST "Valid types are (b)uy or (s)ell","",4,,Trans_Type.PREVINVS,1